function  answer =  parcial()


    fprintf("________metodo de regula falsi _________\n")
    [c,y lista_x] = regula_falsi(@(x) x*sin(x)-1,0,2,0.000005,[],50);
    c
    y
    max_ite = length(lista_x);
    lista_x
    max_ite
    fprintf("________metodo de la bisseccion_________\n")
    [c,y,lista_x,max_ite] = biseccion(@(x) x*sin(x)-1,0,2,0.000005,[],50);
    c 
    y
    max_ite

   
endfunction

%se corre con regula_falsi(@x  x* sin(x) -1,0,2,0.000005,50)
